home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / Projects / Testers / 24-Tone Octave Tester next >
Encoding:
Text File  |  1998-10-26  |  670 b   |  25 lines  |  [TEXT/ScoM]
  1. ; This tester plays 24-tone octave. If you do not know how many steps one
  2. ; semitone has you can test it experimentally by this example. When you
  3. ; hear the scale progressing smoothly then the resolution is acceptable.
  4. ; Hint: 24-tone scale sounds like a 12-tone chromatic scale, except it
  5. ; has extra step in between each note.
  6.  
  7. (def-section sect-a
  8.    default
  9.       zone '(24/16)
  10.       tonality (activate-tonality (equal-tempered 24 'c 4 4096))
  11.       length '(1/16)
  12.       velocity '(64)
  13.    piano
  14.       symbol '(a b c d e f g h   i j k l m n o p   q r s t u v x y)
  15.       channel 1
  16. )
  17.  
  18. (def-tempo 120)
  19.  
  20. (midiport :printer)
  21.  
  22. (play-file-p "tuning test"
  23.    piano '(sect-a)
  24. )
  25.